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Receiving the service 
specifications 



S602 



Translating the service 
specifications into a domain 
file in PDDL format 
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Receiving the service request 
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Translating the service 
request into a problem file 
in PDDL format 
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in XML format 
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PDDL problem file program code 



(define (problem iTourl) 
(rdomain iTour) 

(:objects locObjl locObj2 - Location 

itineraryObj - Itinerary) 

(:init (Start locObjl) 
(End locObj2)) 
(:goal (and (Trip itineraryObj locObjl locObj2)))) 
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PDDL domain file program code 



(define (domain iTour) 

(requirements :strips :equality :typing) 
(predicates 

(Start ?loc - Location) 
(End ?loc - Location) 
(At ?station - Station 

?loc - Location) 
(Trip ?i - Itinerary 

?locl ?loc2 - Location) 

) 

(: action AskStation 

parameters (?loc - Location 

?station - Station) 
:effect (and (At ?station ?loc)) 



( : action Makeltinerary 

parameters (?locl ?loc2 - Location 

?stationl ?station2 - Station 
?i - Itinerary) 
precondition (and (Start ?loc 1 ) 

(End?loc2) 

(At ?stationl ?locl) 

(At ?station2 ?loc2)) 



reflect (and (Trip ?i ?locl ?loc2)) 
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PDDL domain file program code 



(define (domain iTour) 

(requirements :strips :equality :typing) 
(predicates 

(Start ?loc - Location) 
(End ?loc - Location) 
(At ?station - Station 

?loc - Location) 
(Trip ?i - Itinerary 

?locl ?loc2 - Location) 
(used ?o - Object) 



) 



(iconstants newStationObj 1 newStationObj2 newStationObj3 - Station 

newItineraryObj - Itinerary) 

(: action AskStation 

parameters (?loc - Location 

?station - Station) 
precondition (and (not (used ?station)) ) 
:effect (and (At ?station ?loc) 

(used ?station) 

) 

) 

(: action Makeltinerary 

parameters (?locl ?loc2 - Location 

?stationl ?station2 - Station 
?i - Itinerary) 
precondition (and (Start ?locl) 

(End ?loc2) 
(At ?stationl ?locl) 
(At ?station2 ?loc2) 
(not (used ?i)) 
) 



:effect ( 



and (Trip ?i ?locl ?loc2) 
(used ?i) 
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